object frmCotizador: TfrmCotizador
  Left = 180
  Top = 81
  Width = 817
  Height = 571
  Caption = 'Cotizador'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel6: TPanel
    Left = 345
    Top = 0
    Width = 464
    Height = 541
    Align = alClient
    Anchors = [akLeft, akBottom]
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Color = 13555670
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    DesignSize = (
      464
      541)
    object Label8: TLabel
      Left = 8
      Top = 5
      Width = 13
      Height = 11
      Caption = 'N'#186
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label10: TLabel
      Left = 136
      Top = 5
      Width = 56
      Height = 11
      Anchors = [akLeft, akTop, akRight]
      Caption = 'Proveedor:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label11: TLabel
      Left = 8
      Top = 36
      Width = 94
      Height = 11
      Caption = 'Fecha de Creaci'#243'n:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object txtSubtotal: TDBText
      Left = 405
      Top = 335
      Width = 44
      Height = 11
      Alignment = taRightJustify
      Anchors = [akRight, akBottom]
      AutoSize = True
      DataField = 'totalNeto'
      DataSource = sRenglonCoti
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label15: TLabel
      Left = 280
      Top = 335
      Width = 44
      Height = 11
      Anchors = [akRight, akBottom]
      Caption = 'Subtotal:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label16: TLabel
      Left = 301
      Top = 373
      Width = 23
      Height = 11
      Anchors = [akRight, akBottom]
      Caption = 'IVA:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label17: TLabel
      Left = 270
      Top = 349
      Width = 54
      Height = 11
      Anchors = [akRight, akBottom]
      Caption = 'Descuento:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label18: TLabel
      Left = 295
      Top = 388
      Width = 29
      Height = 11
      Anchors = [akRight, akBottom]
      Caption = 'Total:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object txtCalcIva: TDBText
      Left = 406
      Top = 373
      Width = 43
      Height = 11
      Alignment = taRightJustify
      Anchors = [akRight, akBottom]
      AutoSize = True
      DataField = 'calcIva'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object txtSub1: TDBText
      Left = 418
      Top = 360
      Width = 31
      Height = 11
      Alignment = taRightJustify
      Anchors = [akRight, akBottom]
      AutoSize = True
      DataField = 'sub1'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object txtCalcDesc: TDBText
      Left = 401
      Top = 347
      Width = 48
      Height = 11
      Alignment = taRightJustify
      Anchors = [akRight, akBottom]
      AutoSize = True
      DataField = 'calcDesc'
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object txtTotal: TDBText
      Left = 418
      Top = 388
      Width = 31
      Height = 11
      Alignment = taRightJustify
      Anchors = [akRight, akBottom]
      AutoSize = True
      DataField = 'totalGeneral'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object lblRubro: TLabel
      Left = 64
      Top = 269
      Width = 89
      Height = 33
      AutoSize = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      WordWrap = True
    end
    object lblFechaPrecio: TLabel
      Left = 64
      Top = 302
      Width = 3
      Height = 11
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 124
      Top = 36
      Width = 89
      Height = 11
      Caption = 'Fecha Devoluci'#243'n:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label3: TLabel
      Left = 385
      Top = 35
      Width = 75
      Height = 11
      Anchors = [akTop, akRight]
      Caption = 'Demora (d'#237'as):'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label2: TLabel
      Left = 281
      Top = 35
      Width = 64
      Height = 11
      Anchors = [akTop, akRight]
      Caption = 'Vencimiento:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label4: TLabel
      Left = 8
      Top = 405
      Width = 105
      Height = 11
      Anchors = [akLeft, akBottom]
      Caption = 'Condiciones de Pago:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label5: TLabel
      Left = 8
      Top = 447
      Width = 73
      Height = 11
      Anchors = [akLeft, akBottom]
      Caption = 'Observaciones'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object DBText1: TDBText
      Left = 32
      Top = 8
      Width = 64
      Height = 23
      AutoSize = True
      DataField = 'ID_COTIZACION'
      DataSource = sCoti
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'Arial Narrow'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object lblNombre: TLabel
      Left = 88
      Top = 75
      Width = 33
      Height = 11
      Caption = 'OBRA:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label7: TLabel
      Left = 8
      Top = 75
      Width = 15
      Height = 11
      Caption = 'ID:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clNavy
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object cmbProveedor: TDBLookupComboBox
      Left = 136
      Top = 16
      Width = 322
      Height = 17
      Anchors = [akLeft, akTop, akRight]
      BevelEdges = []
      BevelOuter = bvRaised
      BevelKind = bkFlat
      Ctl3D = False
      DataField = 'proveedor'
      DataSource = sCotiProv
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      OnEnter = cmbProveedorEnter
    end
    object Panel10: TPanel
      Left = 2
      Top = 501
      Width = 460
      Height = 38
      Align = alBottom
      BevelInner = bvRaised
      BevelOuter = bvLowered
      Color = 11580341
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 12
      DesignSize = (
        460
        38)
      object nvgCotizador: TDBNavigator
        Left = 109
        Top = 7
        Width = 192
        Height = 25
        DataSource = sCoti
        VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbPost, nbCancel]
        Anchors = [akLeft, akTop, akRight]
        Flat = True
        TabOrder = 0
      end
      object btnGrabar: TBitBtn
        Left = 312
        Top = 8
        Width = 63
        Height = 24
        Anchors = [akTop, akRight]
        Caption = 'Grabar'
        Default = True
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        OnClick = btnGrabarClick
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
        Spacing = 0
      end
      object BitBtn1: TBitBtn
        Left = 379
        Top = 7
        Width = 75
        Height = 25
        Anchors = [akTop, akRight]
        Caption = 'Cancelar'
        Default = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ModalResult = 2
        ParentFont = False
        TabOrder = 2
        Glyph.Data = {
          36050000424D3605000000000000360400002800000010000000100000000100
          0800000000000001000000000000000000000001000000010000000000000101
          0100020202000303030004040400050505000606060007070700080808000909
          09000A0A0A000B0B0B000C0C0C000D0D0D000E0E0E000F0F0F00101010001111
          1100121212001313130014141400151515001616160017171700181818001919
          19001A1A1A001B1B1B001C1C1C001D1D1D001E1E1E001F1F1F00202020002121
          2100222222002323230024242400252525002626260027272700282828002929
          29002A2A2A002B2B2B002C2C2C002D2D2D002E2E2E002F2F2F00303030003131
          3100323232003333330034343400353535003636360037373700383838003939
          39003A3A3A003B3B3B003C3C3C003D3D3D003E3E3E003F3F3F00404040004141
          4100424242004343430044444400454545004646460047474700484848004949
          49004A4A4A004B4B4B004C4C4C004D4D4D004E4E4E004F4F4F00505050005151
          5100525252005353530054545400555555005656560057575700585858005959
          59005A5A5A005B5B5B005C5C5C005D5D5D005E5E5E005F5F5F00606060006161
          6100626262006363630064646400656565006666660067676700686868006969
          69006A6A6A006B6B6B006C6C6C006D6D6D006E6E6E006F6F6F00707070007171
          7100727272007373730074747400757575007676760077777700787878007979
          79007A7A7A007B7B7B007C7C7C007D7D7D007E7E7E007F7F7F00808080008181
          8100828282008383830084848400858585008686860087878700888888008989
          89008A8A8A008B8B8B008C8C8C008D8D8D008E8E8E008F8F8F00909090009191
          9100929292009393930094949400959595009696960097979700989898009999
          99009A9A9A009B9B9B009C9C9C009D9D9D009E9E9E009F9F9F00A0A0A000A1A1
          A100A2A2A200A3A3A300A4A4A400A5A5A500A6A6A600A7A7A700A8A8A800A9A9
          A900AAAAAA00ABABAB00ACACAC00ADADAD00AEAEAE00AFAFAF00B0B0B000B1B1
          B100B2B2B200B3B3B300B4B4B400B5B5B500B6B6B600B7B7B700B8B8B800B9B9
          B900BABABA00BBBBBB00BCBCBC00BDBDBD00BEBEBE00BFBFBF00C0C0C000C1C1
          C100C2C2C200C3C3C300B8BBC700ADB3CB00A3ACCF0099A5D300909ED6007086
          DE004969E7002950EE001642F3000D3BF5000838F6000536F7000435F8000335
          F8000334F8000334F9000334F9000334F8000334F7000334F6000434F4000434
          F1000433EF000433ED000533EB000533E9000533E7000632E4000632E1000632
          DE000632DD000632DD000632DD000632DD000731DD000831DD000C30DE00132F
          DF00202CE1004625E6007C1AED00CC0AF800EC04FC00F901FE00FD00FE00FE00
          FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
          FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00F7F7F7F7F7F7
          F7F7F7F7F7F7F7F7E1E1F7E1E1F7F7F7F7F7F7F7F7F7F7E1E1F7F7E1E1E1F7F7
          F7F7F7F7F7F7E1E1F7F7F7E1E3E1E1F7F7F7F7F7F7E1E1F7F7F7F7F7DBE1E1E1
          F7F7F7F7E1E1F7F7F7F7F7F7F7F7E1E1E3F7E3E1E1F7F7F7F7F7F7F7F7F7F7E3
          DEDEDDE3F7F7F7F7F7F7F7F7F7F7F7F7DFDFDAF7F7F7F7F7F7F7F7F7F7F7F7E3
          DBDDDAD8F7F7F7F7F7F7F7F7F7F7D8DADCF7F7D8D1F7F7F7F7F7F7F7F7D1DAD5
          F7F7F7F7D1D1F7F7F7F7F7F7D1D1D1F7F7F7F7F7F7D1D1F7F7F7F7D1D1D1F7F7
          F7F7F7F7F7F7F7D1F7F7D1D1D1F7F7F7F7F7F7F7F7F7F7F7F7F7D1D1F7F7F7F7
          F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7F7}
        Spacing = 0
      end
      object btnVistaPrevia: TBitBtn
        Left = 8
        Top = 7
        Width = 97
        Height = 25
        Caption = 'Vista Previa'
        Default = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 3
        OnClick = btnVistaPreviaClick
        Glyph.Data = {
          36050000424D3605000000000000360400002800000010000000100000000100
          0800000000000001000000000000000000000001000000010000000000000101
          0100020202000303030004040400050505000606060007070700080808000909
          09000A0A0A000B0B0B000C0C0C000D0D0D000E0E0E000F0F0F00101010001111
          1100121212001313130014141400151515001616160017171700181818001919
          19001A1A1A001B1B1B001C1C1C001D1D1D001E1E1E001F1F1F00202020002121
          2100222222002323230024242400252525002626260027272700282828002929
          29002A2A2A002B2B2B002C2C2C002D2D2D002E2E2E002F2F2F00303030003131
          3100323232003333330034343400353535003636360037373700383838003939
          39003A3A3A003B3B3B003C3C3C003D3D3D003E3E3E003F3F3F00404040004141
          4100424242004343430044444400454545004646460047474700484848004949
          49004A4A4A004B4B4B004C4C4C004D4D4D004E4E4E004F4F4F00505050005151
          5100525252005353530054545400555555005656560057575700585858005959
          59005A5A5A005B5B5B005C5C5C005D5D5D005E5E5E005F5F5F00606060006161
          61006262620063636300646464006565650065686B00656C7100697078006C74
          7E006E788400707B8900717E8E007280920071819500708297006F8298006D81
          98006C8198006A829B0068839E006683A0006584A1006485A3006188AA005F8C
          B1005E8EB6005E91BA005F93BD005C93C1005793C5005493C7005293C8005096
          CF005392C8005792C6005C92C2006592BC006B91B7006E90B200728DAC00768B
          A5007B889D008185950087879400928B92009F909100AD969100B89A9100BD9D
          9200C19F9300C4A29300C7A49400CCA79300D2AB9300D8AE9100DFB28F00E1B3
          8F00E2B38F00E1B28F00E1B18D00E0B08D00DEAE8C00DEAE8B00DCAC8B00DAAA
          8B00DAA98A00D8A88B00D6A68A00D3A38900D1A08800CF9E8800CD9B8600CA97
          8300C6938100C4907E00C18D7C00BF8B7B00BB887A00B9867900B7847800B683
          7700B5837700B5827700B3817800B3817900B3827C00B4827E00B5828000B582
          8100B6828200B6828200B6828300B7838300B7848400B8858600B9868900BB85
          8F00C07E9B00CB6FB000D65AC000DF46CF00EA2DE000F31CEE00F90EF800FC06
          FC00FE02FE00FE01FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
          FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE01
          FE00FD07FB00FC11F700FA23EF00F73BE400F164D200EB91BE00E7AEB100E5B9
          AC00E4C1A900E5C6A600E6C9A500EACBA200EDCEA000EFD09F00F0D0A100F0D2
          A500F1D4A800F1D5AB00F2D7B000F1D8B400F1D9BA00F1DABF00EFDAC400EFDC
          C700EFDDCC00F3E3D100F4E6D600F7EADB00F9EEE100FAF2E800FBF5ED00FBF6
          F000FCF9F500FDFBF800FEFCFA00FEFDFC00FEFCFB00FEFDFB00D2D2BCBCBCBC
          BCBCBCBCBCBCBCBCBCD2D2D268F6F3EFEDEBE9E7E7E7E7E7BCD2D27D818AF3EF
          EEECEAE8E6E6E6E7BCD2D2D281818BF3F0EEECEBE8E6E6E7BCD2D2D2B481818A
          F3EFEEECEAE8E7E7BCD2D2D2BFFC8184B591B5AA97EAE8E7BCD2D2D2BFFDF892
          94E4F1E29297EAEABCD2D2D2A9FDFA92F0F5F4FFE2AAEDECBCD2D2D2A9FDFDB5
          F6F6F5F9F1B5EEEDBCD2D2D2A2FDFD92F2F8F6F6E391EFEEBCD2D2D2A2FDFDF2
          95F2F6F09493F0E2BCD2D2D29CFDFDFDF292B592E1AFAFAFBCD2D2D29CFDFDFD
          FDFDFDFFF1AF9CA2AED2D2D29AFDFDFDFDFDFDFDF2AFE7AAD2D2D2D29AFAFAF9
          F9F9F9F9F2AFA8D2D2D2D2D29AA2A2A2A2A2A2A2A2AFD2D2D2D2}
        Spacing = 3
      end
    end
    object DBEdit1: TDBEdit
      Left = 341
      Top = 370
      Width = 35
      Height = 17
      Anchors = [akRight, akBottom]
      BevelOuter = bvRaised
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'IVA'
      DataSource = sCotiProv
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 11
      OnEnter = cmbProveedorEnter
    end
    object DBEdit2: TDBEdit
      Left = 341
      Top = 345
      Width = 35
      Height = 17
      Anchors = [akRight, akBottom]
      BevelOuter = bvRaised
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'DESCUENTO'
      DataSource = sCotiProv
      Font.Charset = ANSI_CHARSET
      Font.Color = clRed
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 10
      OnEnter = cmbProveedorEnter
    end
    object edtCreacion: TDBDateEdit
      Left = 8
      Top = 48
      Width = 111
      Height = 19
      DataField = 'FECHA'
      DataSource = sCoti
      NumGlyphs = 2
      TabOrder = 1
      StartOfWeek = Sun
      YearDigits = dyTwo
      OnEnter = edtCreacionEnter
    end
    object edtDevolucion: TDBDateEdit
      Left = 124
      Top = 48
      Width = 109
      Height = 19
      DataField = 'FECHA_DEVOLUCION'
      DataSource = sCotiProv
      NumGlyphs = 2
      TabOrder = 2
      StartOfWeek = Sun
      YearDigits = dyTwo
      OnEnter = cmbProveedorEnter
    end
    object edtVencimiento: TDBDateEdit
      Left = 281
      Top = 48
      Width = 101
      Height = 19
      DataField = 'VENCIMIENTO'
      DataSource = sCotiProv
      Anchors = [akTop, akRight]
      NumGlyphs = 2
      TabOrder = 3
      StartOfWeek = Sun
      YearDigits = dyTwo
      OnEnter = cmbProveedorEnter
    end
    object edtDemora: TDBEdit
      Left = 385
      Top = 48
      Width = 73
      Height = 19
      Anchors = [akTop, akRight]
      BevelOuter = bvRaised
      BevelKind = bkFlat
      BorderStyle = bsNone
      DataField = 'DEMORA'
      DataSource = sCotiProv
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnEnter = cmbProveedorEnter
    end
    object DBMemo1: TDBMemo
      Left = 8
      Top = 459
      Width = 450
      Height = 34
      Anchors = [akLeft, akRight, akBottom]
      DataField = 'OBSERVACIONES'
      DataSource = sCotiProv
      TabOrder = 8
      OnEnter = cmbProveedorEnter
      OnKeyPress = DBMemo1KeyPress
    end
    object DBMemo2: TDBMemo
      Left = 8
      Top = 418
      Width = 450
      Height = 26
      Anchors = [akLeft, akRight, akBottom]
      DataField = 'CONDICIONES_PAGO'
      DataSource = sCotiProv
      TabOrder = 9
      OnEnter = cmbProveedorEnter
      OnKeyPress = DBMemo1KeyPress
    end
    object btnNuevoCotizador: TBitBtn
      Left = 8
      Top = 340
      Width = 129
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = 'Nuevo Cotizador'
      Default = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 13
      OnClick = btnNuevoCotizadorClick
      Glyph.Data = {
        36050000424D3605000000000000360400002800000010000000100000000100
        0800000000000001000000000000000000000001000000010000000000000101
        0100020202000303030004040400050505000606060007070700080808000909
        09000A0A0A000B0B0B000C0C0C000D0D0D00140F0E001A120F00201510002918
        11003C1D12004B2113005524130060271300662913006A2A13006D2B1300712C
        1400792E1400822F15008E32150099381A00A43F2000B04A2B00B5523500BE5A
        3C00C9614200DA694800E46B4900E86B4B00EC6C4B00ED694A00EE694B00EE68
        4B00EF674A00EE654900EE634600EE5F4300EE5E4200EC5E4100EA5D4100E85C
        4000E5583C00E1563800DB523400D5502F00CD4C2900C6482500BF442000B541
        1E00A93E1E00973A1D0088361E007C35210076342300693529005C3530005036
        360044363C00393741003038460024394E00183A5600103D5E000B3E6100083F
        6600093E63000B3E62000D3D5F00103D5D00133E5D0017405C001D415B002042
        5A0024445A00284559002E475900344958003B4C5700404E5800445058004953
        59004F555A0055585B005C5C5C005D5D5D005E5E5E005F5F5F00606060006161
        61006262620063636300646464006565650067666600656A6C00656D72006472
        790062767E0062798300617B8600607D89005E7F8E005A82960058849C005586
        A1005387A6005188AA004F89AE004D8AB2004B8CB800498EBE00468FC5004292
        CF003F95D9003B97E3003598EE003299F5003099F9002E98F9002D96F9002C95
        FA002B94F9002A92FA002890F900278FFA00278EFA00268DF900258CF9002489
        F8002488F800258AF800268DF900278EF800288EF8002A90F8002B91F7002E93
        F6003094F4003395F1003796ED003D98E8004097E4004596DF004A95D9005195
        D1005895CD006096C8006897C2007298BB007E9AB4008A9CAC00989EA400A1A1
        A100A2A2A200A3A3A300A4A4A400A5A5A500A6A6A600A7A7A700A8A8A800A9A9
        A900AAAAAA00ABABAB00ACACAC00ADADAD00AEAEAE00B2ADAC00B6ADAB00BAAD
        AA00BDADA900BFADA900C1AEA900C9B4AF00D0A5B300D88ABF00E45ECC00F03F
        D900F728E300FB1BEB00FC12F100FD09F700FE00FE00FE00FE00FE00FE00FE00
        FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
        FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
        FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
        FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
        FE00FE00FE00FE00FE00FD01FE00FA02FC00F505FB00D414F500B422EF00972F
        E9007D3BE4006745E000544DDD004554DB003959D9002E5ED8002860D8002262
        D7001C64D6001864D2001565CF001366CC001065C9000F64C3000F65BD000F65
        B7000E65B2000E66AE000E66AB000F67A7000F68A3000E68A100D0D0D0D0D0D0
        D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0181818181818D0D0D0D0D0D0D0D0D01838
        34322D2E331818D0D0D0D0D0D0D018382E2639B6263718D0D0D0D0D0D0D01834
        262839B5B53818D0D0D0D0D0D0D0D0392639B6B5B63318D0D0D0D0D0D0D0D0D0
        2069706F6639D0D0D0D0D0D0D0D0D0D0F5F6F7F7FFD0D0D0D0D0D0D0D0D0D04C
        8A8A8A8AF3FFD0D0D0D0D0D0D0D049FF838183868AF2FFD0D0D0D0D0D0D0494C
        8F8E7E7F848AFFD0D0D0D0D0D0D049494C4C7E7E8189FFD0D0D0D0D0D0D0FF77
        49F87E7E7EFFD0D0D0D0D0D0D0D0D0FF77FF494949FFD0D0D0D0D0D0D0D0D0D0
        FDFF4949D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0D0}
      Spacing = 0
    end
    object btnNuevaCotizacion: TBitBtn
      Left = 8
      Top = 371
      Width = 129
      Height = 25
      Anchors = [akLeft, akBottom]
      Caption = 'Nueva Cotizaci'#243'n'
      Default = True
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 14
      OnClick = btnNuevaCotizacionClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500000000055
        555557777777775F55550FFFFFFFFF0555557F5555555F7FFF5F0FEEEEEE0000
        05007F555555777775770FFFFFF0BFBFB00E7F5F5557FFF557770F0EEEE000FB
        FB0E7F75FF57775555770FF00F0FBFBFBF0E7F57757FFFF555770FE0B00000FB
        FB0E7F575777775555770FFF0FBFBFBFBF0E7F5575FFFFFFF5770FEEE0000000
        FB0E7F555777777755770FFFFF0B00BFB0007F55557577FFF7770FEEEEE0B000
        05557F555557577775550FFFFFFF0B0555557FF5F5F57575F55500F0F0F0F0B0
        555577F7F7F7F7F75F5550707070700B055557F7F7F7F7757FF5507070707050
        9055575757575757775505050505055505557575757575557555}
      NumGlyphs = 2
      Spacing = 0
    end
    object grdRenglonCoti: TRxDBGrid
      Left = 8
      Top = 98
      Width = 450
      Height = 233
      Anchors = [akLeft, akTop, akRight, akBottom]
      DataSource = sRenglonCoti
      Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 7
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnEnter = grdRenglonCotiEnter
      Columns = <
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'CANTIDAD'
          Title.Alignment = taCenter
          Title.Caption = 'Cantidad'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clNavy
          Title.Font.Height = -9
          Title.Font.Name = 'Tahoma'
          Title.Font.Style = [fsBold]
          Width = 57
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'material'
          Title.Alignment = taCenter
          Title.Caption = 'Material'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clNavy
          Title.Font.Height = -9
          Title.Font.Name = 'Tahoma'
          Title.Font.Style = [fsBold]
          Width = 200
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'UNITARIO'
          Title.Alignment = taCenter
          Title.Caption = 'Unitario'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clNavy
          Title.Font.Height = -9
          Title.Font.Name = 'Tahoma'
          Title.Font.Style = [fsBold]
          Width = 63
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'subtotal'
          Title.Alignment = taCenter
          Title.Caption = 'Subtotal'
          Title.Font.Charset = ANSI_CHARSET
          Title.Font.Color = clNavy
          Title.Font.Height = -9
          Title.Font.Name = 'Tahoma'
          Title.Font.Style = [fsBold]
          Width = 72
          Visible = True
        end>
    end
    object nombre: TEdit
      Left = 126
      Top = 71
      Width = 331
      Height = 21
      Anchors = [akLeft, akTop, akRight]
      CharCase = ecUpperCase
      TabOrder = 6
    end
    object DBEdit3: TDBEdit
      Left = 32
      Top = 71
      Width = 51
      Height = 19
      BevelInner = bvLowered
      BevelOuter = bvRaised
      DataField = 'ID_OBRA'
      DataSource = sCoti
      Font.Charset = ANSI_CHARSET
      Font.Color = clBlack
      Font.Height = -9
      Font.Name = 'Tahoma'
      Font.Style = []
      ParentFont = False
      TabOrder = 5
      OnEnter = edtCreacionEnter
    end
  end
  object Panel9: TPanel
    Left = 0
    Top = 0
    Width = 345
    Height = 541
    Align = alLeft
    BevelInner = bvRaised
    BevelOuter = bvLowered
    Color = 10791869
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    object Panel30: TPanel
      Left = 2
      Top = 502
      Width = 341
      Height = 37
      Align = alBottom
      BevelInner = bvRaised
      BevelOuter = bvLowered
      Color = 11580341
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 0
      DesignSize = (
        341
        37)
      object Label58: TLabel
        Left = 8
        Top = 15
        Width = 33
        Height = 13
        Caption = 'Filtrar'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object btnBorrarBuscar: TSpeedButton
        Left = 359
        Top = 7
        Width = 26
        Height = 25
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF3333993333339993333377FF3333377FF3399993333339
          993337777FF3333377F3393999333333993337F777FF333337FF993399933333
          399377F3777FF333377F993339993333399377F33777FF33377F993333999333
          399377F333777FF3377F993333399933399377F3333777FF377F993333339993
          399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
          99333773FF3333777733339993333339933333773FFFFFF77333333999999999
          3333333777333777333333333999993333333333377777333333}
        NumGlyphs = 2
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
      end
      object edtFiltroMaterial: TEdit
        Left = 54
        Top = 6
        Width = 142
        Height = 25
        Anchors = [akLeft, akTop, akRight]
        BevelKind = bkFlat
        BevelOuter = bvRaised
        BorderStyle = bsNone
        CharCase = ecUpperCase
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnChange = edtFiltroMaterialChange
      end
      object btnDesfiltrarMaterial: TBitBtn
        Left = 201
        Top = 7
        Width = 26
        Height = 25
        Hint = 'Buscar'
        Anchors = [akTop, akRight]
        Cancel = True
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = btnDesfiltrarMaterialClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF3333993333339993333377FF3333377FF3399993333339
          993337777FF3333377F3393999333333993337F777FF333337FF993399933333
          399377F3777FF333377F993339993333399377F33777FF33377F993333999333
          399377F333777FF3377F993333399933399377F3333777FF377F993333339993
          399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
          99333773FF3333777733339993333339933333773FFFFFF77333333999999999
          3333333777333777333333333999993333333333377777333333}
        NumGlyphs = 2
        Spacing = 2
      end
      object btnNuevoMaterial: TBitBtn
        Left = 232
        Top = 7
        Width = 105
        Height = 25
        Anchors = [akLeft, akBottom]
        Caption = 'Material Nuevo'
        Default = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        OnClick = btnNuevoMaterialClick
        Glyph.Data = {
          36050000424D3605000000000000360400002800000010000000100000000100
          0800000000000001000000000000000000000001000000010000000000000101
          01000202020003090300040F0400041A060005270700053B0800054909000557
          0A0004600A0004640B0005600B0005580B00074B0C00093E0D000C2D0E000E23
          0F00101C11001218120014141400151515001616160017171700181818001919
          19001A1A1A001B1B1B001C1C1C001D1D1D001E1E1E001F1F1F00202020002121
          2100222222002323230024242400252525002626260027272700282828002929
          29002A2A2A002B2B2B002C2C2C002D2D2D002E2E2E002F2F2F00303030003131
          3100323232003333330034343400353535003636360037373700383838003939
          39003A3A3A003B3B3B003C3C3C003D3D3D003E3E3E003F3F3F00404040004141
          4100424242004343430044444400454545004646460047474700484848004949
          49004A4A4A004B4B4B004C4C4C004D4D4D004E4E4E004F4F4F00505050005151
          5100525252005353530054545400555555005656560057575700625262007F44
          7F0097389700B926B900E011E000F405F400FB02FB00FE00FE00FE00FE00FE00
          FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
          FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
          FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
          FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00FE00
          FE00FE01FE00FD01FD00FC03FC00FA05FA00F708F700F20EF200EB16EB00E023
          E000D135D100C347C300B25DB200A86BA800A274A2009C7D9C00968796009191
          9100929292009393930094949400959595009696960097979700989898009999
          99009A9A9A009B9B9B009C9C9C009D9D9D009E9E9E009F9F9F00A0A0A000A1A1
          A100A2A2A200A3A3A300A4A4A400A5A5A500A6A6A600A7A7A700A8A8A800A9A9
          A900AAAAAA00ABABAB00AEB0B000B1B6B600B5C0C200B8CACD00BBD4D800BCDC
          E200C2E6EC00C6ECF200C8EFF500CAF2F800CDF3F900CAF4FA00C7F4FB00C5F5
          FC00C2F5FC00BDF5FC00B4F5FC00ACF5FC00A2F5FC0098F4FC0094F5FC0092F4
          FC008EF4FC008AF3FC0087F3FC0086F1FC0084EFFC0081EDFB007EEBFB007BE8
          FB0078E5FA0077E1FA0075DFF90071DDF9006DDAF90069D7F80065D3F80062D1
          F8005FD0F8005DCEF8005ACCF80058CAF70056C9F70054C7F60051C5F4004EC2
          F10048BDEA0041B6E2003BB1DC0035ACD70031A8D4002DA4D10029A0CE00279D
          CB002399C8002197C6001F94C4001B90C1001489BB000C7FB4000578AF000477
          AE000375AD000275AC000274AC000274AC000274AC000274AC000274AB000375
          A9000579A300087F9800108C89001A9D790021A96F0024AF680022AB610022AB
          590023AD4F0021AB490021AA420020A83C001EA638001BA2330070EEEEEEEEEE
          EEEEEEEEEEEEEEEE7070EEE6DBD0D9D9D9D9D9D9D9D9E2EE7070EEDDE4CBD7D7
          D7D7D7D7D7D7E1D0EE70EED5EEBFD2D2D2D2D2D2D2D2E0BFEE70EED2E7CCCBCE
          CECECECECECEDFBEEE70EECEDFDCBFCACACACACACA0BDEBEDAEEEECDD2E7B6BC
          BBBBBBBC0BFC0BB6B5EEEEC8C8E7EEEEEEEEEE0BF7F7FA0BEEEEEEC5C4C4C5C4
          C4C50BFAF7F7F7FA0B70EEB6C3C3C3C3C30B0B0B0BF7FA0B0B0B70EEB6C2C2C2
          F0DFDFDF0BF8FD0B70707070EEEEEEEE707070700BFA0B707070707070707070
          7070700BFFFF0B7070707070707070707070700BFF0B70707070707070707070
          700B0B0B0B707070707070707070700B0B0B0B70707070707070}
        Spacing = 2
      end
    end
    object grdMaterial: TRxDBGrid
      Left = 2
      Top = 182
      Width = 341
      Height = 320
      Align = alClient
      DataSource = sMaterial
      ReadOnly = True
      TabOrder = 1
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnDblClick = grdMaterialDblClick
      OnEnter = grdRenglonCotiEnter
      Columns = <
        item
          Expanded = False
          FieldName = 'MATERIAL'
          Title.Alignment = taCenter
          Title.Caption = 'Material'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clNavy
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Width = 294
          Visible = True
        end>
    end
    object RxDBGrid1: TRxDBGrid
      Left = 2
      Top = 2
      Width = 341
      Height = 143
      Align = alTop
      DataSource = sProveedor
      ReadOnly = True
      TabOrder = 2
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      OnEnter = grdRenglonCotiEnter
      Columns = <
        item
          Expanded = False
          FieldName = 'RAZON'
          Title.Alignment = taCenter
          Title.Caption = 'Proveedores'
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clNavy
          Title.Font.Height = -11
          Title.Font.Name = 'MS Sans Serif'
          Title.Font.Style = [fsBold]
          Width = 294
          Visible = True
        end>
    end
    object Panel1: TPanel
      Left = 2
      Top = 145
      Width = 341
      Height = 37
      Align = alTop
      BevelInner = bvRaised
      BevelOuter = bvLowered
      Color = 11580341
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      DesignSize = (
        341
        37)
      object Label6: TLabel
        Left = 8
        Top = 15
        Width = 33
        Height = 13
        Caption = 'Filtrar'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clNavy
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object SpeedButton1: TSpeedButton
        Left = 359
        Top = 7
        Width = 26
        Height = 25
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF3333993333339993333377FF3333377FF3399993333339
          993337777FF3333377F3393999333333993337F777FF333337FF993399933333
          399377F3777FF333377F993339993333399377F33777FF33377F993333999333
          399377F333777FF3377F993333399933399377F3333777FF377F993333339993
          399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
          99333773FF3333777733339993333339933333773FFFFFF77333333999999999
          3333333777333777333333333999993333333333377777333333}
        NumGlyphs = 2
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
      end
      object edtFiltroProveedor: TEdit
        Left = 54
        Top = 6
        Width = 219
        Height = 25
        Anchors = [akLeft, akTop, akRight]
        BevelKind = bkFlat
        BevelOuter = bvRaised
        BorderStyle = bsNone
        CharCase = ecUpperCase
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 0
        OnChange = edtFiltroProveedorChange
      end
      object btnDesfiltrarProveedor: TBitBtn
        Left = 275
        Top = 7
        Width = 26
        Height = 25
        Hint = 'Buscar'
        Anchors = [akTop, akRight]
        Cancel = True
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 1
        OnClick = btnDesfiltrarProveedorClick
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000130B0000130B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
          3333333777333777FF3333993333339993333377FF3333377FF3399993333339
          993337777FF3333377F3393999333333993337F777FF333337FF993399933333
          399377F3777FF333377F993339993333399377F33777FF33377F993333999333
          399377F333777FF3377F993333399933399377F3333777FF377F993333339993
          399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
          99333773FF3333777733339993333339933333773FFFFFF77333333999999999
          3333333777333777333333333999993333333333377777333333}
        NumGlyphs = 2
        Spacing = 2
      end
    end
  end
  object cdsCotizacion: TClientDataSet
    Aggregates = <>
    FetchOnDemand = False
    Params = <>
    ProviderName = 'dspCotizacion'
    OnNewRecord = cdsCotizacionNewRecord
    Left = 72
    Top = 264
    object cdsCotizacionID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object cdsCotizacionFECHA: TSQLTimeStampField
      FieldName = 'FECHA'
      Required = True
      DisplayFormat = '  /  /'
      EditMask = '!99/99/00;1;_'
    end
    object cdsCotizacionOBSERVACIONES: TMemoField
      FieldName = 'OBSERVACIONES'
      BlobType = ftMemo
      Size = 1
    end
    object cdsCotizacionID_OBRA: TIntegerField
      FieldName = 'ID_OBRA'
    end
    object cdsCotizaciondsCotiProv: TDataSetField
      FieldName = 'dsCotiProv'
    end
    object cdsCotizaciondsRenglonCotizacion: TDataSetField
      FieldName = 'dsRenglonCotizacion'
    end
    object cdsCotizacionobra: TStringField
      FieldKind = fkLookup
      FieldName = 'obra'
      LookupDataSet = Datos.cPresupuesto
      LookupKeyFields = 'ID_PRESUPUESTO'
      LookupResultField = 'DENOMINACION'
      KeyFields = 'ID_OBRA'
      Size = 60
      Lookup = True
    end
  end
  object dspCotizacion: TDataSetProvider
    DataSet = dsCotizacion
    Constraints = True
    Left = 104
    Top = 264
  end
  object dsCotizacion: TSQLDataSet
    SQLConnection = Datos.Con
    CommandText = 'select * from COTIZACION where ID_COTIZACION = :id'
    Params = <
      item
        DataType = ftInteger
        Name = 'id'
        ParamType = ptInput
      end>
    Left = 104
    Top = 232
    object dsCotizacionID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object dsCotizacionFECHA: TSQLTimeStampField
      FieldName = 'FECHA'
      Required = True
    end
    object dsCotizacionOBSERVACIONES: TMemoField
      FieldName = 'OBSERVACIONES'
      BlobType = ftMemo
      Size = 1
    end
    object dsCotizacionID_OBRA: TIntegerField
      FieldName = 'ID_OBRA'
    end
  end
  object sCotizacion: TDataSource
    DataSet = dsCotizacion
    Left = 72
    Top = 232
  end
  object dsCotiProv: TSQLDataSet
    SQLConnection = Datos.Con
    CommandText = 
      'select * from COTIZACION_PROVEEDOR where ID_COTIZACION = :id_Cot' +
      'izacion'
    DataSource = sCotizacion
    Params = <
      item
        DataType = ftInteger
        Name = 'ID_COTIZACION'
        ParamType = ptInput
        Size = 4
      end>
    Left = 40
    Top = 232
    object dsCotiProvID_PROVEEDOR: TSmallintField
      FieldName = 'ID_PROVEEDOR'
      Required = True
    end
    object dsCotiProvID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object dsCotiProvID_COTIZACION_PROVEEDOR: TIntegerField
      FieldName = 'ID_COTIZACION_PROVEEDOR'
      Required = True
    end
    object dsCotiProvCONDICIONES_PAGO: TMemoField
      FieldName = 'CONDICIONES_PAGO'
      BlobType = ftMemo
      Size = 1
    end
    object dsCotiProvOBSERVACIONES: TMemoField
      FieldName = 'OBSERVACIONES'
      BlobType = ftMemo
      Size = 1
    end
    object dsCotiProvFECHA_DEVOLUCION: TSQLTimeStampField
      FieldName = 'FECHA_DEVOLUCION'
    end
    object dsCotiProvDEMORA: TSmallintField
      FieldName = 'DEMORA'
    end
    object dsCotiProvVENCIMIENTO: TSQLTimeStampField
      FieldName = 'VENCIMIENTO'
    end
    object dsCotiProvIVA: TFloatField
      FieldName = 'IVA'
    end
    object dsCotiProvDESCUENTO: TFloatField
      FieldName = 'DESCUENTO'
    end
  end
  object cdsCotiProv: TClientDataSet
    Aggregates = <>
    DataSetField = cdsCotizaciondsCotiProv
    FetchOnDemand = False
    Params = <>
    BeforeInsert = cdsCotiProvBeforeInsert
    OnNewRecord = cdsCotiProvNewRecord
    Left = 40
    Top = 264
    object cdsCotiProvID_PROVEEDOR: TSmallintField
      FieldName = 'ID_PROVEEDOR'
      Required = True
    end
    object cdsCotiProvID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object cdsCotiProvID_COTIZACION_PROVEEDOR: TIntegerField
      FieldName = 'ID_COTIZACION_PROVEEDOR'
      Required = True
    end
    object cdsCotiProvCONDICIONES_PAGO: TMemoField
      FieldName = 'CONDICIONES_PAGO'
      BlobType = ftMemo
      Size = 1
    end
    object cdsCotiProvOBSERVACIONES: TMemoField
      FieldName = 'OBSERVACIONES'
      BlobType = ftMemo
      Size = 1
    end
    object cdsCotiProvFECHA_DEVOLUCION: TSQLTimeStampField
      FieldName = 'FECHA_DEVOLUCION'
    end
    object cdsCotiProvDEMORA: TSmallintField
      FieldName = 'DEMORA'
    end
    object cdsCotiProvVENCIMIENTO: TSQLTimeStampField
      FieldName = 'VENCIMIENTO'
    end
    object cdsCotiProvproveedor: TStringField
      FieldKind = fkLookup
      FieldName = 'proveedor'
      LookupDataSet = cdsProveedor
      LookupKeyFields = 'ID_PROVEEDOR'
      LookupResultField = 'RAZON'
      KeyFields = 'ID_PROVEEDOR'
      Size = 50
      Lookup = True
    end
    object cdsCotiProvIVA: TFloatField
      FieldName = 'IVA'
    end
    object cdsCotiProvDESCUENTO: TFloatField
      FieldName = 'DESCUENTO'
    end
  end
  object dsRenglonCotizacion: TSQLDataSet
    SQLConnection = Datos.Con
    CommandText = 
      'select * from RENGLON_COTIZACION where ID_COTIZACION = :id_Cotiz' +
      'acion'
    DataSource = sCotizacion
    Params = <
      item
        DataType = ftInteger
        Name = 'ID_COTIZACION'
        ParamType = ptInput
        Size = 4
      end>
    Left = 8
    Top = 232
    object dsRenglonCotizacionID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object dsRenglonCotizacionID_MATERIAL: TIntegerField
      FieldName = 'ID_MATERIAL'
      Required = True
    end
    object dsRenglonCotizacionCANTIDAD: TFloatField
      FieldName = 'CANTIDAD'
    end
    object dsRenglonCotizacionUNITARIO: TFloatField
      FieldName = 'UNITARIO'
    end
  end
  object cdsRenglonCotizacion: TClientDataSet
    Aggregates = <>
    AggregatesActive = True
    DataSetField = cdsCotizaciondsRenglonCotizacion
    FetchOnDemand = False
    Params = <>
    BeforeInsert = cdsCotiProvBeforeInsert
    OnCalcFields = cdsRenglonCotizacionCalcFields
    OnNewRecord = cdsRenglonCotizacionNewRecord
    Left = 8
    Top = 264
    object cdsRenglonCotizacionID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object cdsRenglonCotizacionID_MATERIAL: TIntegerField
      FieldName = 'ID_MATERIAL'
      Required = True
    end
    object cdsRenglonCotizacionCANTIDAD: TFloatField
      FieldName = 'CANTIDAD'
      DisplayFormat = '#,###,##0.00'
    end
    object cdsRenglonCotizacionUNITARIO: TFloatField
      FieldName = 'UNITARIO'
      DisplayFormat = '#,###,##0.000'
    end
    object cdsRenglonCotizacionmaterial: TStringField
      FieldKind = fkLookup
      FieldName = 'material'
      LookupDataSet = cdsMaterialTotal
      LookupKeyFields = 'ID_MATERIAL'
      LookupResultField = 'MATERIAL'
      KeyFields = 'ID_MATERIAL'
      Size = 80
      Lookup = True
    end
    object cdsRenglonCotizacionsubtotal: TFloatField
      FieldKind = fkInternalCalc
      FieldName = 'subtotal'
      DisplayFormat = '#,###,##0.00'
    end
    object cdsRenglonCotizaciontotalNeto: TAggregateField
      FieldName = 'totalNeto'
      Visible = True
      Active = True
      DisplayFormat = '#,###,##0.00'
      Expression = 'sum (subtotal)'
    end
  end
  object sCoti: TDataSource
    DataSet = cdsCotizacion
    OnStateChange = sCotiStateChange
    OnDataChange = sCotiDataChange
    Left = 72
    Top = 296
  end
  object sCotiProv: TDataSource
    DataSet = cdsCotiProv
    OnStateChange = sCotiStateChange
    Left = 8
    Top = 296
  end
  object sRenglonCoti: TDataSource
    DataSet = cdsRenglonCotizacion
    OnStateChange = sCotiStateChange
    Left = 40
    Top = 296
  end
  object cdsMaterial: TSQLClientDataSet
    CommandText = 
      'select ID_MATERIAL, MATERIAL from MATERIAL where ID_PROVEEDOR = ' +
      ':idProveedor'
    Aggregates = <>
    IndexFieldNames = 'MATERIAL'
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftSmallint
        Name = 'idProveedor'
        ParamType = ptInput
      end>
    DBConnection = Datos.Con
    Left = 16
    Top = 416
    object cdsMaterialID_MATERIAL: TFloatField
      FieldName = 'ID_MATERIAL'
      Required = True
    end
    object cdsMaterialMATERIAL: TStringField
      FieldName = 'MATERIAL'
      Required = True
      Size = 50
    end
  end
  object sMaterial: TDataSource
    DataSet = cdsMaterial
    Left = 48
    Top = 416
  end
  object rpCotizacion: TppReport
    PrinterSetup.BinName = 'Default'
    PrinterSetup.DocumentName = 'Report'
    PrinterSetup.PaperName = 'A4'
    PrinterSetup.PrinterName = 'Default'
    PrinterSetup.mmMarginBottom = 19050
    PrinterSetup.mmMarginLeft = 19050
    PrinterSetup.mmMarginRight = 19050
    PrinterSetup.mmMarginTop = 19050
    PrinterSetup.mmPaperHeight = 297127
    PrinterSetup.mmPaperWidth = 210079
    PrinterSetup.PaperSize = 9
    AllowPrintToArchive = True
    AllowPrintToFile = True
    ArchiveFileName = 'cotizacion'
    BeforePrint = rpCotizacionBeforePrint
    DeviceType = 'Screen'
    OutlineSettings.CreateNode = True
    OutlineSettings.CreatePageNodes = True
    OutlineSettings.Enabled = True
    OutlineSettings.Visible = False
    PreviewFormSettings.ZoomSetting = zsPageWidth
    SavePrinterSetup = True
    TextSearchSettings.DefaultString = '<FindText>'
    TextSearchSettings.Enabled = True
    Left = 224
    Top = 440
    Version = '9.01'
    mmColumnWidth = 197379
    object ppHeaderBand1: TppHeaderBand
      PrintHeight = phDynamic
      mmBottomOffset = 0
      mmHeight = 49742
      mmPrintPosition = 0
      object ppLabel2: TppLabel
        UserName = 'Label2'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'Fecha:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 12
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 5027
        mmLeft = 130175
        mmTop = 14552
        mmWidth = 11113
        BandType = 0
      end
      object ppDBImage1: TppDBImage
        UserName = 'DBImage1'
        MaintainAspectRatio = False
        Stretch = True
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        DataField = 'LOGO'
        DataPipeline = ppEmpresa
        GraphicType = 'Bitmap'
        ParentDataPipeline = False
        DataPipelineName = 'ppEmpresa'
        mmHeight = 14288
        mmLeft = 0
        mmTop = 0
        mmWidth = 73025
        BandType = 0
      end
      object ppLabel8: TppLabel
        UserName = 'Label8'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'PEDIDO DE COTIZACI'#211'N N'#186
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 18
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 7408
        mmLeft = 84931
        mmTop = 529
        mmWidth = 69586
        BandType = 0
      end
      object ppDia: TppLabel
        UserName = 'Dia'
        AutoSize = False
        Border.BorderPositions = [bpLeft, bpTop, bpRight, bpBottom]
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = True
        Border.Weight = 1
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 14
        Font.Style = []
        TextAlignment = taCentered
        Transparent = True
        mmHeight = 7776
        mmLeft = 142875
        mmTop = 12700
        mmWidth = 10443
        BandType = 0
      end
      object ppMes: TppLabel
        UserName = 'Dia1'
        AutoSize = False
        Border.BorderPositions = [bpLeft, bpTop, bpRight, bpBottom]
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = True
        Border.Weight = 1
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 14
        Font.Style = []
        TextAlignment = taCentered
        Transparent = True
        mmHeight = 7776
        mmLeft = 152136
        mmTop = 12700
        mmWidth = 10443
        BandType = 0
      end
      object ppanno: TppLabel
        UserName = 'Dia2'
        AutoSize = False
        Border.BorderPositions = [bpLeft, bpTop, bpRight, bpBottom]
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = True
        Border.Weight = 1
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 14
        Font.Style = []
        TextAlignment = taCentered
        Transparent = True
        mmHeight = 7776
        mmLeft = 161396
        mmTop = 12700
        mmWidth = 10443
        BandType = 0
      end
      object ppEmail: TppLabel
        UserName = 'Email'
        AutoSize = False
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'Email:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 9
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        mmHeight = 3704
        mmLeft = 0
        mmTop = 13758
        mmWidth = 9790
        BandType = 0
      end
      object ppTe: TppLabel
        UserName = 'Te'
        AutoSize = False
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'TE:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 9
        Font.Style = []
        TextAlignment = taRightJustified
        Transparent = True
        mmHeight = 3704
        mmLeft = 0
        mmTop = 17727
        mmWidth = 9790
        BandType = 0
      end
      object ppDBText3: TppDBText
        UserName = 'DBText3'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        DataField = 'EMAIL'
        DataPipeline = ppEmpresa
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Name = 'Arial Narrow'
        Font.Size = 9
        Font.Style = []
        ParentDataPipeline = False
        Transparent = True
        DataPipelineName = 'ppEmpresa'
        mmHeight = 3704
        mmLeft = 11906
        mmTop = 13758
        mmWidth = 61119
        BandType = 0
      end
      object ppDBText6: TppDBText
        UserName = 'DBText6'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        DataField = 'TE1'
        DataPipeline = ppEmpresa
        Font.Charset = ANSI_CHARSET
        Font.Color = clNavy
        Font.Name = 'Arial Narrow'
        Font.Size = 9
        Font.Style = []
        ParentDataPipeline = False
        Transparent = True
        DataPipelineName = 'ppEmpresa'
        mmHeight = 3704
        mmLeft = 11906
        mmTop = 17727
        mmWidth = 61119
        BandType = 0
      end
      object ppLabel12: TppLabel
        UserName = 'Label12'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'OBRA:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 13
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 5292
        mmLeft = 1058
        mmTop = 22490
        mmWidth = 12171
        BandType = 0
      end
      object ppNombreObra: TppLabel
        UserName = 'NombreObra'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 14
        Font.Style = [fsItalic]
        Transparent = True
        mmHeight = 5821
        mmLeft = 15346
        mmTop = 22490
        mmWidth = 156634
        BandType = 0
      end
      object ppLine4: TppLine
        UserName = 'Line4'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psDot
        Border.Visible = False
        Border.Weight = 1
        Style = lsDouble
        Weight = 0.75
        mmHeight = 1058
        mmLeft = 0
        mmTop = 30692
        mmWidth = 171715
        BandType = 0
      end
      object ppLabel1: TppLabel
        UserName = 'Label1'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'Proveedor:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 11
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 4498
        mmLeft = 529
        mmTop = 32279
        mmWidth = 18256
        BandType = 0
      end
      object ppLabel3: TppLabel
        UserName = 'Label3'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'Fecha de Vencimiento:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 11
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 4498
        mmLeft = 529
        mmTop = 37571
        mmWidth = 34660
        BandType = 0
      end
      object ppLabel10: TppLabel
        UserName = 'Label10'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'Condiciones de Pago:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 11
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 4498
        mmLeft = 529
        mmTop = 43656
        mmWidth = 36777
        BandType = 0
      end
      object ppDBText5: TppDBText
        UserName = 'DBText5'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psDot
        Border.Visible = False
        Border.Weight = 1
        DataField = 'CONDICIONES_PAGO'
        DataPipeline = ppCotiProv
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 12
        Font.Style = [fsBold]
        ParentDataPipeline = False
        Transparent = True
        DataPipelineName = 'ppCotiProv'
        mmHeight = 5821
        mmLeft = 37571
        mmTop = 43392
        mmWidth = 133615
        BandType = 0
      end
      object ppDBText4: TppDBText
        UserName = 'DBText4'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        DataField = 'VENCIMIENTO'
        DataPipeline = ppCotiProv
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 14
        Font.Style = [fsBold]
        ParentDataPipeline = False
        Transparent = True
        DataPipelineName = 'ppCotiProv'
        mmHeight = 5556
        mmLeft = 37571
        mmTop = 37571
        mmWidth = 25665
        BandType = 0
      end
      object ppLabel9: TppLabel
        UserName = 'Label9'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'Demora (d'#237'as):'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 11
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 4498
        mmLeft = 123296
        mmTop = 38100
        mmWidth = 22225
        BandType = 0
      end
      object ppDBText9: TppDBText
        UserName = 'DBText9'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        DataField = 'DEMORA'
        DataPipeline = ppCotiProv
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 14
        Font.Style = [fsBold]
        ParentDataPipeline = False
        Transparent = True
        DataPipelineName = 'ppCotiProv'
        mmHeight = 5556
        mmLeft = 147638
        mmTop = 37571
        mmWidth = 23283
        BandType = 0
      end
      object ppProveedor: TppLabel
        UserName = 'Proveedor'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 12
        Font.Style = []
        Transparent = True
        mmHeight = 4995
        mmLeft = 37571
        mmTop = 32015
        mmWidth = 10837
        BandType = 0
      end
      object ppID: TppLabel
        UserName = 'Proveedor1'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 18
        Font.Style = [fsBold]
        TextAlignment = taRightJustified
        Transparent = True
        mmHeight = 6604
        mmLeft = 156887
        mmTop = 794
        mmWidth = 14563
        BandType = 0
      end
    end
    object ppDetailBand1: TppDetailBand
      PrintHeight = phDynamic
      mmBottomOffset = 0
      mmHeight = 5027
      mmPrintPosition = 0
      object ppSubReport2: TppSubReport
        UserName = 'SubReport2'
        ExpandAll = False
        NewPrintJob = False
        OutlineSettings.CreateNode = True
        TraverseAllData = False
        DataPipelineName = 'ppRenglonCotizacion'
        mmHeight = 5027
        mmLeft = 0
        mmTop = 0
        mmWidth = 171979
        BandType = 4
        mmBottomOffset = 0
        mmOverFlowOffset = 0
        mmStopPosition = 0
        object ppChildReport2: TppChildReport
          AutoStop = False
          DataPipeline = ppRenglonCotizacion
          PrinterSetup.BinName = 'Default'
          PrinterSetup.DocumentName = 'Report'
          PrinterSetup.PaperName = 'A4'
          PrinterSetup.PrinterName = 'Default'
          PrinterSetup.mmMarginBottom = 19050
          PrinterSetup.mmMarginLeft = 19050
          PrinterSetup.mmMarginRight = 19050
          PrinterSetup.mmMarginTop = 19050
          PrinterSetup.mmPaperHeight = 297127
          PrinterSetup.mmPaperWidth = 210079
          PrinterSetup.PaperSize = 9
          Version = '9.01'
          mmColumnWidth = 0
          DataPipelineName = 'ppRenglonCotizacion'
          object ppTitleBand2: TppTitleBand
            mmBottomOffset = 0
            mmHeight = 7408
            mmPrintPosition = 0
            object ppLabel4: TppLabel
              UserName = 'Label4'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              Caption = 'Cantidad'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = [fsBold]
              Transparent = True
              mmHeight = 5027
              mmLeft = 0
              mmTop = 529
              mmWidth = 14817
              BandType = 1
            end
            object ppLabel5: TppLabel
              UserName = 'Label5'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              Caption = 'Material'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = [fsBold]
              Transparent = True
              mmHeight = 5027
              mmLeft = 19315
              mmTop = 529
              mmWidth = 13229
              BandType = 1
            end
            object ppLabel6: TppLabel
              UserName = 'Label6'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              Caption = 'Unitario'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = [fsBold]
              Transparent = True
              mmHeight = 5027
              mmLeft = 129911
              mmTop = 529
              mmWidth = 13229
              BandType = 1
            end
            object ppLabel7: TppLabel
              UserName = 'Label7'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              Caption = 'Subtotal'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = [fsBold]
              Transparent = True
              mmHeight = 4911
              mmLeft = 157163
              mmTop = 529
              mmWidth = 13885
              BandType = 1
            end
            object ppLine1: TppLine
              UserName = 'Line1'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psDot
              Border.Visible = False
              Border.Weight = 1
              Style = lsDouble
              Weight = 0.75
              mmHeight = 1058
              mmLeft = 265
              mmTop = 6350
              mmWidth = 171186
              BandType = 1
            end
            object ppLine2: TppLine
              UserName = 'Line2'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psDot
              Border.Visible = False
              Border.Weight = 1
              Style = lsDouble
              Weight = 0.75
              mmHeight = 1058
              mmLeft = 529
              mmTop = 0
              mmWidth = 171186
              BandType = 1
            end
          end
          object ppDetailBand3: TppDetailBand
            mmBottomOffset = 0
            mmHeight = 6085
            mmPrintPosition = 0
            object datCantidad: TppDBText
              UserName = 'datCantidad'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              DataField = 'CANTIDAD'
              DataPipeline = ppRenglonCotizacion
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = []
              TextAlignment = taRightJustified
              Transparent = True
              DataPipelineName = 'ppRenglonCotizacion'
              mmHeight = 5038
              mmLeft = 265
              mmTop = 265
              mmWidth = 17198
              BandType = 4
            end
            object datMaterial: TppDBText
              UserName = 'datMaterial'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              DataField = 'material'
              DataPipeline = ppRenglonCotizacion
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = []
              Transparent = True
              DataPipelineName = 'ppRenglonCotizacion'
              mmHeight = 5027
              mmLeft = 19050
              mmTop = 265
              mmWidth = 104511
              BandType = 4
            end
            object datUnitario: TppDBText
              OnPrint = datUnitarioPrint
              UserName = 'datUnitario'
              BlankWhenZero = True
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              DataField = 'UNITARIO'
              DataPipeline = ppRenglonCotizacion
              DisplayFormat = '#,##0.00'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = []
              TextAlignment = taRightJustified
              Transparent = True
              DataPipelineName = 'ppRenglonCotizacion'
              mmHeight = 5038
              mmLeft = 125942
              mmTop = 265
              mmWidth = 17198
              BandType = 4
            end
            object ppLine3: TppLine
              UserName = 'Line3'
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              Weight = 0.75
              mmHeight = 265
              mmLeft = 0
              mmTop = 5821
              mmWidth = 171980
              BandType = 4
            end
            object datSubtotal: TppDBText
              OnPrint = datUnitarioPrint
              UserName = 'datSubtotal'
              BlankWhenZero = True
              Border.BorderPositions = []
              Border.Color = clBlack
              Border.Style = psSolid
              Border.Visible = False
              Border.Weight = 1
              DataField = 'subtotal'
              DataPipeline = ppRenglonCotizacion
              DisplayFormat = '#,##0.00'
              Font.Charset = ANSI_CHARSET
              Font.Color = clBlack
              Font.Name = 'Arial Narrow'
              Font.Size = 12
              Font.Style = []
              TextAlignment = taRightJustified
              Transparent = True
              DataPipelineName = 'ppRenglonCotizacion'
              mmHeight = 5038
              mmLeft = 146315
              mmTop = 529
              mmWidth = 24606
              BandType = 4
            end
          end
          object ppSummaryBand2: TppSummaryBand
            mmBottomOffset = 0
            mmHeight = 0
            mmPrintPosition = 0
          end
          object raCodeModule1: TraCodeModule
            ProgramStream = {00}
          end
        end
      end
    end
    object ppFooterBand1: TppFooterBand
      mmBottomOffset = 0
      mmHeight = 24606
      mmPrintPosition = 0
      object ppLabel11: TppLabel
        UserName = 'Label101'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 'Observaciones:'
        Font.Charset = ANSI_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial Narrow'
        Font.Size = 12
        Font.Style = [fsBold]
        Transparent = True
        mmHeight = 4911
        mmLeft = 0
        mmTop = 0
        mmWidth = 26162
        BandType = 8
      end
      object ppObservaciones: TppMemo
        UserName = 'Observaciones'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        CharWrap = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 10
        Font.Style = []
        Transparent = True
        mmHeight = 19050
        mmLeft = 29104
        mmTop = 0
        mmWidth = 142611
        BandType = 8
        mmBottomOffset = 0
        mmOverFlowOffset = 0
        mmStopPosition = 0
        mmLeading = 0
      end
      object ppLabel13: TppLabel
        UserName = 'Label13'
        Border.BorderPositions = []
        Border.Color = clBlack
        Border.Style = psSolid
        Border.Visible = False
        Border.Weight = 1
        Caption = 
          'Detallar marcas de los art'#237'culos consignados, fecha de vencimien' +
          'to de la cotizaci'#243'n, plazos de entrega y formas de pago.'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Name = 'Arial'
        Font.Size = 8
        Font.Style = []
        Transparent = True
        WordWrap = True
        mmHeight = 3175
        mmLeft = 7938
        mmTop = 19844
        mmWidth = 152929
        BandType = 8
      end
    end
    object raCodeModule2: TraCodeModule
      ProgramStream = {00}
    end
    object ppParameterList1: TppParameterList
    end
  end
  object ppRenglonCotizacion: TppDBPipeline
    DataSource = sRengCoti
    UserName = 'RenglonCotizacion'
    Left = 160
    Top = 440
  end
  object ppEmpresa: TppDBPipeline
    DataSource = sEmpresa
    UserName = 'RenglonCotizacion1'
    Left = 272
    Top = 440
    object ppEmpresappField1: TppField
      FieldAlias = 'RAZON'
      FieldName = 'RAZON'
      FieldLength = 0
      DisplayWidth = 0
      Position = 0
    end
    object ppEmpresappField2: TppField
      FieldAlias = 'DOMICILIO'
      FieldName = 'DOMICILIO'
      FieldLength = 52
      DisplayWidth = 52
      Position = 1
    end
    object ppEmpresappField3: TppField
      Alignment = taRightJustify
      FieldAlias = 'ID_LOCALIDAD'
      FieldName = 'ID_LOCALIDAD'
      FieldLength = 0
      DataType = dtDouble
      DisplayWidth = 10
      Position = 2
    end
    object ppEmpresappField4: TppField
      FieldAlias = 'ALTA'
      FieldName = 'ALTA'
      FieldLength = 0
      DataType = dtDateTime
      DisplayWidth = 34
      Position = 3
    end
    object ppEmpresappField5: TppField
      FieldAlias = 'CUIT'
      FieldName = 'CUIT'
      FieldLength = 15
      DisplayWidth = 15
      Position = 4
    end
    object ppEmpresappField6: TppField
      FieldAlias = 'EMAIL'
      FieldName = 'EMAIL'
      FieldLength = 42
      DisplayWidth = 42
      Position = 5
    end
    object ppEmpresappField7: TppField
      FieldAlias = 'WEB'
      FieldName = 'WEB'
      FieldLength = 52
      DisplayWidth = 52
      Position = 6
    end
    object ppEmpresappField8: TppField
      FieldAlias = 'OBSERVACIONES'
      FieldName = 'OBSERVACIONES'
      FieldLength = 1
      DataType = dtBLOB
      DisplayWidth = 10
      Position = 7
      Searchable = False
      Sortable = False
    end
    object ppEmpresappField9: TppField
      FieldAlias = 'LOGO'
      FieldName = 'LOGO'
      FieldLength = 1
      DataType = dtBLOB
      DisplayWidth = 10
      Position = 8
      Searchable = False
      Sortable = False
    end
    object ppEmpresappField10: TppField
      FieldAlias = 'TE1'
      FieldName = 'TE1'
      FieldLength = 17
      DisplayWidth = 17
      Position = 9
    end
    object ppEmpresappField11: TppField
      FieldAlias = 'TE2'
      FieldName = 'TE2'
      FieldLength = 17
      DisplayWidth = 17
      Position = 10
    end
    object ppEmpresappField12: TppField
      FieldAlias = 'localidad'
      FieldName = 'localidad'
      FieldLength = 30
      DisplayWidth = 30
      Position = 11
    end
    object ppEmpresappField13: TppField
      FieldAlias = 'provincia'
      FieldName = 'provincia'
      FieldLength = 30
      DisplayWidth = 30
      Position = 12
    end
    object ppEmpresappField14: TppField
      FieldAlias = 'caracteristica'
      FieldName = 'caracteristica'
      FieldLength = 6
      DisplayWidth = 6
      Position = 13
    end
    object ppEmpresappField15: TppField
      FieldAlias = 'cod_postal'
      FieldName = 'cod_postal'
      FieldLength = 15
      DisplayWidth = 15
      Position = 14
    end
  end
  object sEmpresa: TDataSource
    DataSet = Datos.empresa
    Left = 304
    Top = 440
  end
  object cdsProveedor: TSQLClientDataSet
    CommandText = 'select ID_PROVEEDOR, RAZON from PROVEEDOR'
    Aggregates = <>
    IndexFieldNames = 'RAZON'
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    DBConnection = Datos.Con
    Left = 16
    Top = 384
    object cdsProveedorID_PROVEEDOR: TSmallintField
      FieldName = 'ID_PROVEEDOR'
      Required = True
    end
    object cdsProveedorRAZON: TStringField
      FieldName = 'RAZON'
      Required = True
      Size = 40
    end
  end
  object sProveedor: TDataSource
    DataSet = cdsProveedor
    OnDataChange = sProveedorDataChange
    Left = 48
    Top = 384
  end
  object cdsMaterialTotal: TSQLClientDataSet
    CommandText = 'MATERIAL'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <>
    CommandType = ctTable
    DBConnection = Datos.Con
    Left = 16
    Top = 448
    object FloatField1: TFloatField
      FieldName = 'ID_MATERIAL'
      Required = True
    end
    object StringField1: TStringField
      FieldName = 'MATERIAL'
      Required = True
      Size = 50
    end
  end
  object sMaterialTotal: TDataSource
    DataSet = cdsMaterialTotal
    Left = 48
    Top = 448
  end
  object ppCotiProv: TppDBPipeline
    DataSource = sCotProv
    UserName = 'RenglonCotizacion2'
    Left = 192
    Top = 440
  end
  object ds: TSQLDataSet
    SQLConnection = Datos.Con
    Params = <>
    Left = 288
    Top = 232
  end
  object sRengCoti: TDataSource
    DataSet = dsRengCoti
    OnStateChange = sCotiStateChange
    Left = 160
    Top = 400
  end
  object sCotProv: TDataSource
    DataSet = dsCotProv
    OnStateChange = sCotiStateChange
    Left = 192
    Top = 400
  end
  object dsCotProv: TSQLClientDataSet
    CommandText = 
      'select * from COTIZACION_PROVEEDOR where ID_COTIZACION = :idCoti' +
      'zacion and ID_PROVEEDOR = :idProveedor'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftInteger
        Name = 'idCotizacion'
        ParamType = ptInput
      end
      item
        DataType = ftSmallint
        Name = 'idProveedor'
        ParamType = ptInput
      end>
    DBConnection = Datos.Con
    Left = 192
    Top = 368
    object dsCotProvID_PROVEEDOR: TSmallintField
      FieldName = 'ID_PROVEEDOR'
      Required = True
    end
    object dsCotProvID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object dsCotProvID_COTIZACION_PROVEEDOR: TIntegerField
      FieldName = 'ID_COTIZACION_PROVEEDOR'
      Required = True
    end
    object dsCotProvCONDICIONES_PAGO: TMemoField
      FieldName = 'CONDICIONES_PAGO'
      BlobType = ftMemo
      Size = 1
    end
    object dsCotProvFECHA_DEVOLUCION: TSQLTimeStampField
      FieldName = 'FECHA_DEVOLUCION'
    end
    object dsCotProvDEMORA: TSmallintField
      FieldName = 'DEMORA'
    end
    object dsCotProvVENCIMIENTO: TSQLTimeStampField
      FieldName = 'VENCIMIENTO'
    end
    object dsCotProvIVA: TFloatField
      FieldName = 'IVA'
    end
    object dsCotProvDESCUENTO: TFloatField
      FieldName = 'DESCUENTO'
    end
    object dsCotProvOBSERVACIONES: TMemoField
      FieldName = 'OBSERVACIONES'
      BlobType = ftMemo
      Size = 1
    end
  end
  object dsRengCoti: TSQLClientDataSet
    CommandText = 
      'select * from RENGLON_COTIZACION where ID_COTIZACION = :idCotiza' +
      'cion'
    Aggregates = <>
    Options = [poAllowCommandText]
    ObjectView = True
    Params = <
      item
        DataType = ftInteger
        Name = 'idCotizacion'
        ParamType = ptInput
      end>
    OnCalcFields = dsRengCotiCalcFields
    DBConnection = Datos.Con
    Left = 160
    Top = 368
    object dsRengCotiID_COTIZACION: TIntegerField
      FieldName = 'ID_COTIZACION'
      Required = True
    end
    object dsRengCotiID_MATERIAL: TIntegerField
      FieldName = 'ID_MATERIAL'
      Required = True
    end
    object dsRengCotiCANTIDAD: TFloatField
      FieldName = 'CANTIDAD'
      DisplayFormat = '#,##0.00'
    end
    object dsRengCotiUNITARIO: TFloatField
      FieldName = 'UNITARIO'
    end
    object dsRengCotimaterial: TStringField
      FieldKind = fkLookup
      FieldName = 'material'
      LookupDataSet = cdsMaterialTotal
      LookupKeyFields = 'ID_MATERIAL'
      LookupResultField = 'MATERIAL'
      KeyFields = 'ID_MATERIAL'
      Size = 60
      Lookup = True
    end
    object dsRengCotisubtotal: TFloatField
      FieldKind = fkInternalCalc
      FieldName = 'subtotal'
      DisplayFormat = '#,##0.00'
    end
  end
end
